home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1994 November / Cd Ware (Nro. 2) - Epimundo.iso / DOS / ED / PCKEY.ZIP / STSPEED.SCR < prev    next >
Encoding:
Text File  |  1993-05-25  |  694 b   |  39 lines
  1. :stspeed.scr
  2.  
  3. if accuracy 1 < 97 goto below_40
  4. speed 70
  5. if words 1 >= 70 goto exit
  6. speed 60
  7. if words 1 >= 60 goto exit
  8. speed 50
  9. if words 1 >= 50 goto exit
  10. speed 45
  11. if words 1 >= 45 goto exit
  12. speed 40
  13. if words 1 >= 40 goto exit
  14. :below_40
  15. if accuracy 1 < 95 goto below_25
  16. speed 35
  17. if words 1 >= 35 goto exit
  18. speed 30
  19. if words 1 >= 30 goto exit
  20. speed 25
  21. if words 1 >= 25 goto exit
  22. :below_25
  23. if accuracy 1 < 94 goto below_19
  24. speed 22
  25. if words 1 >= 22 goto exit
  26. speed 19
  27. if words 1 >= 19 goto exit
  28. :below_19
  29. speed 14
  30. if words 1 >= 14 goto exit
  31. speed 9
  32. if words 1 >= 9 goto exit
  33. speed 5
  34. if words 1 >= 5 goto exit
  35. speed 3
  36. if words 1 >= 3 goto exit
  37. speed 1
  38. :exit
  39.